object Form3: TForm3 Left = 191 Top = 181 BorderIcons = [] BorderStyle = bsSingle ClientHeight = 138 ClientWidth = 431 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object SpeedButton1: TSpeedButton Left = 400 Top = 35 Width = 20 Height = 20 Hint = 'Browse' Caption = '...' ParentShowHint = False ShowHint = True OnClick = SpeedButton1Click end object Label1: TLabel Left = 15 Top = 15 Width = 381 Height = 17 AutoSize = False Caption = 'Label1' end object Bevel1: TBevel Left = 10 Top = 80 Width = 411 Height = 15 Shape = bsBottomLine end object BitBtn1: TBitBtn Left = 225 Top = 105 Width = 96 Height = 25 TabOrder = 2 Kind = bkOK end object BitBtn2: TBitBtn Left = 325 Top = 105 Width = 96 Height = 25 TabOrder = 3 Kind = bkCancel end object BitBtn3: TBitBtn Left = 10 Top = 105 Width = 96 Height = 25 Caption = '&Compress' ModalResult = 4 TabOrder = 4 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFF0008 0000FFFFFFFFFFF08FFFFFFFFFF00000000FFFFFFF0787878780F00000000000 0070F0B3B3B3B3B0F080F03B3B3B3B30F070F0B3B3B3B3B0F080F03B3B3B3B30 F070F0B3B3B3B3B0F080F03B30000000F070F0B3B0FFFFFFF080FF000F000000 0070FFFFFF078787870FFFFFFFF0000000FFFFFFFFFFFFFFFFFF} end object CheckBox1: TCheckBox Left = 15 Top = 65 Width = 131 Height = 17 Caption = 'Include Subdirectory'#39's' State = cbChecked TabOrder = 1 end object Edit1: TEdit Left = 15 Top = 35 Width = 371 Height = 21 AutoSelect = False Ctl3D = True ParentCtl3D = False TabOrder = 0 Text = 'Edit1' end object ZIP: TZipMaster Verbose = True Trace = False AddCompLevel = 7 AddOptions = [] ExtrOptions = [] OnProgress = ZIPProgress OnMessage = ZIPMessage Left = 110 Top = 105 end end